home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 27 / CU Amiga Magazine's Super CD-ROM 27 (1998)(EMAP Images)(GB)[!][issue 1998-10].iso / CUCD / PowerPC / vbcc / machines / amigawos / libsrc / stdio / ftell.c < prev    next >
C/C++ Source or Header  |  1998-08-02  |  295b  |  19 lines
  1. #include <stdio.h>
  2. #include <errno.h>
  3.  
  4. long ftell(FILE *f)
  5. {
  6.   long offset;
  7.  
  8.   if (!f) {
  9.     errno = EBADF;
  10.     return(-1);
  11.   }
  12.   offset = _seek(f->filehandle,0,SEEK_CUR);
  13.   if(f->flags&_READ)
  14.     offset -= f->count;
  15.   if(f->flags&_WRITE)
  16.     offset += f->bufsize-f->count;
  17.   return (offset);
  18. }
  19.